# datos
data = fread("../resultados/argentina/variables.csv")
glimpse(data)
## Rows: 2,159
## Columns: 6
## $ anio            <int> 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, ~
## $ variable        <chr> "Producción de petróleo crudo", "Producción de petróle~
## $ unidad          <chr> "barriles", "barriles", "barriles", "barriles", "barri~
## $ codigo_variable <chr> "Q_crudo_regalias", "Q_crudo_regalias", "Q_crudo_regal~
## $ valor           <dbl> 296505952, 277696773, 269251895, 271502835, 263813108,~
## $ fuente          <chr> "Sec. Energía - Regalías", "Sec. Energía - Regalías", ~
unique(data$variable)
##  [1] "Producción de petróleo crudo"                                          
##  [2] "Producción de gas natural"                                             
##  [3] "Exportaciones de petróleo crudo"                                       
##  [4] "Exportaciones de gas natural"                                          
##  [5] "Precio del mercado interno del petróleo crudo"                         
##  [6] "Precio del mercado interno del gas natural"                            
##  [7] "Precios de referencia mundial de crudo"                                
##  [8] "Precios de exportación de crudo"                                       
##  [9] "Precio del gas natural boca de pozo en Estados Unidos"                 
## [10] "Precio de importación de gas natural en Estados Unidos"                
## [11] "Precio de importación de gas natural por tuberías en Estados Unidos"   
## [12] "Precio de importación de GNL en Estados Unidos"                        
## [13] "Precio de exportación de gas natural en Estados Unidos"                
## [14] "Precio de exportación de gas natural por tuberías en Estados Unidos"   
## [15] "Precio de exportación de GNL en Estados Unidos"                        
## [16] "Precio Henry hub spot del gas natural en Estados Unidos"               
## [17] "Precio CIF del GNL en Japón"                                           
## [18] "Precio Japan Korea Marker del GNL"                                     
## [19] "Precio de importación de gas natural en Alemania"                      
## [20] "Precio NBP del gas natural en Inglaterra"                              
## [21] "Precio TTF del gas natural en Holanda"                                 
## [22] "Precio Alberta del gas natural en Canadá"                              
## [23] "Precio CIF mix OCDE"                                                   
## [24] "Precio del LNG en Asia"                                                
## [25] "Precio del gas natural en la UE"                                       
## [26] "Precio de exportación de gas natural de YPFB hacia Argentina"          
## [27] "Precio de exportación de gas natural de YPFB hacia Brazil"             
## [28] "Precio de importación de gas natural de Argentina desde Bolivia"       
## [29] "Precio de exportación de gas natural desde Bolivia hacia Argentina"    
## [30] "Precio de importación de gas natural de Argentina desde Bolivia (IDEE)"
## [31] "Precio de exportación de gas natural de Argentina"                     
## [32] "Regalías provinciales por la producción de hidrocarburos"              
## [33] "Retenciones a las exportaciones hidrocarburíferas"                     
## [34] "Subsidios a empresas hidrocarburíferas"

Producción

Fuentes:

Producción de Crudo

La producción de petróleo crudo de largo plazo proviene del Anuario de Combustibles, de la cual contamos datos desde 1911 hasta 1992. Sus valores para el período 1980-1992 coinciden con los de EIA, por lo cual pueden usarse como fuentes alternativas. Asimismo, la evolución de SESCO es similar a la de EIA, salvo por pequeñas divergencias entre 2008 y 2013. La serie de Regalías presenta un nivel menor que las anteriores debido a las deducciones de producción que realizan las empresas para pagar un menor nivel de Regalías hacia las provincias donde realizan la producción. Por último, la serie del Ministerio de Economía coincide con Regalías en sus primeros años, luego presenta un nivel intermedio entre Regalías y SESCO y a partir de 2009 toma a SESCO como fuente. Salvo el Anuario de Combustibles, el resto de las series presentan datos hasta los últimos años. Por lo tanto, el criterio de selección para la serie de producción con la que se realizarán los cálculos es el siguiente:

  • Criterio de cómputo para producicón de crudo:
    • 1911 a 1992: Anuario de combustibles
    • 1993 - actualidad: SESCO Downstream
prod_crudo_plt <-  ggplot(data[ variable == "Producción de petróleo crudo", ],
                          aes(anio, valor, color = fuente))+
  geom_line()+
  labs(title = "Gráfico 1. Producción de petróleo crudo. Argentina (1911 - 2020)",
       y = "Millones de Barriles",
       x = "Año",
       caption = "Fuente: elaboración propia en base a Anuario de Combustibles, EIA, Ministerio de Economía, Secretaría de Energía (Base Regalías y SESCO)")+
  theme(legend.position = "bottom", plot.caption = element_text(size = 7.5))+
  # scale_shape_discrete(name = "Fuente")+
  # scale_y_continuous(labels=function(x) format(x, big.mark = ".", scientific = FALSE))+
  scale_y_continuous(labels = scales::unit_format(unit ="", scale = 1e-6))+
  scale_x_continuous(breaks = seq(1910, 2030, by = 10))
# prod_crudo_plt
as.data.frame(dcast(data[ variable == "Producción de petróleo crudo", ] , 
      anio ~ fuente, value.var = "valor"))  %>%
  kable(caption = "Tabla 1. Producción de petróleo crudo en Argentina según distintas fuentes (barriles)",
        knitr.kable.NA = "", booktabs = TRUE)  %>%
  # kable_styling(bootstrap_options = c("striped"))
  kable_styling(latex_options = "repeat_header", repeat_header_text = "Table 2 cont.")
Tabla 1. Producción de petróleo crudo en Argentina según distintas fuentes (barriles)
anio Anuario de combustibles EIA MECON Sec. Energía - Regalías Sec. Energía - SESCO Sec. Energía - SESCO (serie histórica)
1911 12579.6 NA NA NA NA NA
1912 44028.6 NA NA NA NA NA
1913 132085.8 NA NA NA NA NA
1914 276751.2 NA NA NA NA NA
1915 515763.6 NA NA NA NA NA
1916 867992.4 NA NA NA NA NA
1917 1207641.6 NA NA NA NA NA
1918 1352307.0 NA NA NA NA NA
1919 1327147.8 NA NA NA NA NA
1920 1647927.6 NA NA NA NA NA
1921 2056764.6 NA NA NA NA NA
1922 2861859.0 NA NA NA NA NA
1923 3333594.0 NA NA NA NA NA
1924 4660741.8 NA NA NA NA NA
1925 5987889.6 NA NA NA NA NA
1926 7849670.4 NA NA NA NA NA
1927 8629605.6 NA NA NA NA NA
1928 9069891.6 NA NA NA NA NA
1929 9390671.4 NA NA NA NA NA
1930 9000703.8 NA NA NA NA NA
1931 11705317.8 NA NA NA NA NA
1932 13139392.2 NA NA NA NA NA
1933 13692894.6 NA NA NA NA NA
1934 14026254.0 NA NA NA NA NA
1935 14296715.4 NA NA NA NA NA
1936 15460328.4 NA NA NA NA NA
1937 16353480.0 NA NA NA NA NA
1938 17076807.0 NA NA NA NA NA
1939 18611518.2 NA NA NA NA NA
1940 20605384.8 NA NA NA NA NA
1941 22014300.0 NA NA NA NA NA
1942 23706256.2 NA NA NA NA NA
1943 24832130.4 NA NA NA NA NA
1944 24228309.6 NA NA NA NA NA
1945 22882292.4 NA NA NA NA NA
1946 20800368.6 NA NA NA NA NA
1947 21844475.4 NA NA NA NA NA
1948 23221941.6 NA NA NA NA NA
1949 22586671.8 NA NA NA NA NA
1950 23460954.0 NA NA NA NA 23460954
1951 24467322.0 NA NA NA NA 24464806
1952 24819550.8 NA NA NA NA 24819551
1953 28499083.8 NA NA NA NA 28501600
1954 29574639.6 NA NA NA NA 29572124
1955 30505530.0 NA NA NA NA 30504272
1956 31015003.8 NA NA NA NA 31011859
1957 33952340.4 NA NA NA NA 33951711
1958 35656876.2 NA NA NA NA 35656247
1959 44575812.6 NA NA NA NA 44578329
1960 63860339.4 NA NA NA NA 63859811
1961 84459434.4 NA NA NA NA 84461611
1962 98208937.2 NA NA NA NA 98205912
1963 97139671.2 NA NA NA NA 97140621
1964 100278281.4 NA NA NA NA 100275728
1965 99536085.0 NA NA NA NA 98276326
1966 104756619.0 NA NA NA NA 104759676
1967 114675633.6 NA NA NA NA 114673313
1968 125500379.4 NA NA NA NA 125488171
1969 126846396.6 NA NA NA NA 130081536
1970 143420019.6 NA NA NA NA 143397622
1971 154458618.6 NA NA NA NA 154510553
1972 158471511.0 NA NA NA NA 158461781
1973 153722712.0 NA NA NA NA 153728574
1974 151093575.6 NA NA NA NA 151095236
1975 144464126.4 NA NA NA NA 144465535
1976 145590000.6 NA NA NA NA 145592913
1977 157540620.6 NA NA NA NA 157542721
1978 165138699.0 NA NA NA NA 165137944
1979 172554373.2 NA NA NA NA 172553839
1980 179674426.8 179215000 NA NA NA 179675710
1981 181473309.6 181040000 NA NA NA 181475631
1982 179070606.0 179215000 NA NA NA 179071260
1983 179095765.2 179215000 NA NA NA 179096470
1984 175095452.4 174470000 NA NA NA 175096654
1985 167780415.0 167900000 NA NA NA 167780799
1986 158370874.2 158410000 NA NA NA 158370535
1987 156345558.6 156220000 NA NA NA 156346427
1988 164308445.4 163885000 NA NA NA 164306433
1989 168019427.4 167900000 NA NA NA 168021214
1990 176139559.2 176295000 NA NA NA 176139786
1991 180020365.8 177025000 NA NA NA 180017347
1992 202820890.8 201845000 NA NA NA 202821545
1993 NA 216810168 NA NA 216709977 216666596
1994 NA 237290000 NA NA 243705395 243619496
1995 NA 260820000 NA NA 262532039 262532038
1996 NA 275934016 NA NA 286623718 286623720
1997 NA 304290000 NA NA 304444927 304444925
1998 NA 309040000 NA 296505952 309128920 309128920
1999 NA 292815000 281195635 277696773 286730758 280944390
2000 NA 277816858 265524542 269251895 271988857 272277680
2001 NA 292876000 274056011 271502835 280350178 280631963
2002 NA 291688655 269745373 263813108 276359551 276503269
2003 NA 285834055 261961788 253178470 270390707 270191278
2004 NA 267421265 246462266 238558431 254764944 254315156
2005 NA 256832160 235333294 223865031 242735040 242613090
2006 NA 254204945 234258116 222152437 240581577 241190772
2007 NA 247753341 231623045 214937899 234634844 238412146
2008 NA 241343562 229046373 208059287 229813565 236452112
2009 NA 237681193 220344494 204941826 213397024 227941981
2010 NA 228510472 215106366 197987225 208580089 222743304
2011 NA 212222926 202002442 184055431 195537811 209615630
2012 NA 201158723 201076104 183502681 194697352 208440947
2013 NA 197044731 197077900 173900143 191127641 204173770
2014 NA 194238283 194226984 174504828 187966208 201146496
2015 NA 194267150 194339835 175540962 186094035 201105367
2016 NA 186354440 186858772 166419126 178180149 NA
2017 NA 174997000 175065755 157994322 166357511 NA
2018 NA 178587000 178663117 158983018 169528965 NA
2019 NA 185143000 169624009 175647454 175152024 NA
2020 NA NA NA 168517790 164579561 NA
# library(htmlTable)
# htmlTable(dcast(data[ variable == "Producción de petróleo crudo", ] , 
#       anio ~ fuente, value.var = "valor"),
#           # cgroup = c("Set 1:25", "Set 26:50"),
#           # n.cgroup = c(2, 2),
#           # rnames = FALSE
#       )

Producción de Gas Natural

Al igual que en la producción de petróleo crudo, la serie de largo plazo de producción de gas proviene del Anuario de Combustibles, de la cual contamos datos desde 1913 hasta 1992. A diferencia del crudo, sus valores para el período 1980-1992 no coinciden con los de EIA, pero está última sí coincide con los de Regalías entre 1999 y 2015. En cambio, la serie de SESCO, tiende a continuar la evolución de EIA y Regalías, pero con el nivel del Anuario de Combustibles, por lo que ambos pares de series pueden empalmar coherentemente según su nivel. Nuevamente, los valores de la base de Regalías son menores debido a las deducciones de producción para tributar menos regalías. La serie del Ministerio de Economía toma los valores de SESCO.Por lo tanto, el criterio de selección para la serie de producción de gas para los cálculos es el siguiente:

  • Criterio de cómputo de la producción de gas:
    • 1911 a 1992: Anuario de combustibles
    • 1993 en adelante: SESCO Downstream
prod_gas_plt <-  ggplot(data[ variable == "Producción de gas natural", ],
                          aes(anio, valor, color = fuente))+
  geom_line()+
  labs(title = "Gráfico 2. Producción de gas. Argentina (1913 - 2020)",
       y = "MMBTU", x = "Año",
       caption = "Fuente: elaboración propia en base a Anuario de Combustibles, EIA, Ministerio de Economía, Secretaría de Energía (Base Regalías y SESCO)")+
  scale_y_continuous(labels=function(x) format(x, big.mark = ".", scientific = FALSE))+
  scale_x_continuous(breaks = seq(1910, 2030, by = 10))+
  theme(legend.position = "bottom", plot.caption = element_text(size = 7.5) )
prod_gas_plt
## Warning in prettyNum(.Internal(format(x, trim, digits, nsmall, width, 3L, :
## 'big.mark' and 'decimal.mark' are both '.', which could be confusing

ggplotly(prod_gas_plt) %>%
  layout(legend = list(
      orientation = "h",
         x = 0.1, y = -0.2) )
## Warning in prettyNum(.Internal(format(x, trim, digits, nsmall, width, 3L, :
## 'big.mark' and 'decimal.mark' are both '.', which could be confusing
as.data.frame(dcast(data[ variable == "Producción de gas natural", ] , 
      anio ~ fuente, value.var = "valor"))  %>%
  kable(caption = "abla 2. Producción de gas natural en Argentina según distintas fuentes (MMBTU)",
        knitr.kable.NA = "", booktabs = TRUE)  %>%
  # kable_styling(bootstrap_options = c("striped"))
  kable_styling(latex_options = "repeat_header", repeat_header_text = "Table 2 cont.")
abla 2. Producción de gas natural en Argentina según distintas fuentes (MMBTU)
anio Anuario de combustibles EIA MECON Sec. Energía - SESCO Sec. Energía - SESCO (serie histórica)
1913 35300 NA NA NA NA
1914 105900 NA NA NA NA
1915 247100 NA NA NA NA
1916 317700 NA NA NA NA
1917 529500 NA NA NA NA
1918 635400 NA NA NA NA
1919 635400 NA NA NA NA
1920 776600 NA NA NA NA
1921 988400 NA NA NA NA
1922 1306100 NA NA NA NA
1923 1588500 NA NA NA NA
1924 2647500 NA NA NA NA
1925 3388800 NA NA NA NA
1926 6036300 NA NA NA NA
1927 5365600 NA NA NA NA
1928 6106900 NA NA NA NA
1929 9495700 NA NA NA NA
1930 9531000 NA NA NA NA
1931 12143200 NA NA NA NA
1932 16732200 NA NA NA NA
1933 23192100 NA NA NA NA
1934 25804300 NA NA NA NA
1935 21780100 NA NA NA NA
1936 18814900 NA NA NA NA
1937 17826500 NA NA NA NA
1938 17332300 NA NA NA NA
1939 18285400 NA NA NA NA
1940 18920800 NA NA NA NA
1941 20932900 NA NA NA NA
1942 23827500 NA NA NA NA
1943 23862800 NA NA NA NA
1944 23368600 NA NA NA NA
1945 21462400 NA NA NA NA
1946 19838600 NA NA NA NA
1947 20544600 NA NA NA NA
1948 21356500 NA NA NA NA
1949 23756900 NA NA NA NA
1950 26616200 NA NA NA 26637557
1951 29263700 NA NA NA 29300553
1952 31664100 NA NA NA 31704024
1953 32864300 NA NA NA 32902883
1954 34629300 NA NA NA 34784338
1955 37347400 NA NA NA 37580733
1956 40489100 NA NA NA 40524894
1957 49914200 NA NA NA 49929273
1958 58350900 NA NA NA 58382564
1959 75965600 NA NA NA 75981379
1960 126162200 NA NA NA 126187228
1961 173252400 NA NA NA 173272733
1962 217906900 NA NA NA 217907465
1963 209893800 NA NA NA 209914274
1964 230685500 NA NA NA 232476904
1965 220130800 NA NA NA 220145944
1966 210458600 NA NA NA 210489946
1967 228320400 NA NA NA 228324954
1968 249006200 NA NA NA 249383769
1969 247347100 NA NA NA 247362632
1970 270539200 NA NA NA 270571605
1971 286530100 NA NA NA 286532218
1972 293554800 NA NA NA 293583781
1973 314664200 NA NA NA 314677649
1974 332773100 NA NA NA 332801870
1975 362707500 NA NA NA 362711242
1976 389429600 NA NA NA 389421552
1977 411703900 NA NA NA 411694934
1978 406091200 NA NA NA 406097519
1979 452369500 NA NA NA 452381608
1980 475349800 279883745 NA NA 475337374
1981 481103700 345856343 NA NA 481104265
1982 547961900 398834337 NA NA 547974079
1983 606489300 444815238 NA NA 606476274
1984 662369200 493794894 NA NA 662367859
1985 674688900 499792403 NA NA 674693736
1986 679383800 546772888 NA NA 679373563
1987 676630400 526781192 NA NA 676738065
1988 802510200 631737597 NA NA 802513624
1989 854507100 719701060 NA NA 854503182
1990 812535400 629758419 NA NA 812532470
1991 869897900 703537773 NA NA 869894935
1992 884017900 709185427 NA NA 884004839
1993 NA 759667459 NA 902534750 941191792
1994 NA 786133466 NA 938141651 977718114
1995 NA 882863287 NA 1030423781 1074573619
1996 NA 937929964 NA 1178069808 1223135434
1997 NA 966523238 NA 1308711607 1308711565
1998 NA 1044536983 NA 1363647081 1363647119
1999 NA 1220332664 1438440376 1437911083 1497619409
2000 NA 1320585622 1595968230 1595364784 1595968245
2001 NA 1311054531 1695761429 1698918102 1695761415
2002 NA 1274695183 1639935628 1642089377 1639935630
2003 NA 1448725846 1798455265 1800558632 1798455257
2004 NA 1584279142 1841141694 1842819823 1841141676
2005 NA 1610754395 1810134560 1811916924 1810134545
2006 NA 1627345554 1823095828 1823770983 1823095822
2007 NA 1582514125 1799281670 1800028283 1799281666
2008 NA 1555332865 1782235412 1775924408 1782235402
2009 NA 1460092555 1709199505 1709199505 1709199490
2010 NA 1415543529 1662897706 1662897706 1662897715
2011 NA 1368594081 1607122643 1607122643 1607122656
2012 NA 1328704699 1557566403 1557566403 1557566398
2013 NA 1255279998 1472302594 1472302712 1472302602
2014 NA 1253161977 1464386089 1464386089 1464386083
2015 NA 1284932281 1514565301 1514565301 1516943582
2016 NA 1386102188 1588070375 1588070375 NA
2017 NA 1444276650 1576380047 1576380047 NA
2018 NA NA 1659848578 1659848578 NA
2019 NA NA 1603235926 1742063372 NA
2020 NA NA NA 1591882214 NA